(lisp-fill-paragraph): Only obey emacs-lisp-docstring-fill-column in
authorStefan Monnier <monnier@iro.umontreal.ca>
Sun, 1 Apr 2007 19:34:21 +0000 (19:34 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Sun, 1 Apr 2007 19:34:21 +0000 (19:34 +0000)
emacs-lisp-mode.

lisp/emacs-lisp/lisp-mode.el

index 09cb8436c8900ebcab8f9a499f797b49f5bcab22..164756dfdc3593d10be52662796e23005bb13739 100644 (file)
@@ -1280,7 +1280,8 @@ and initial semicolons."
                                     "\\|\\s-*\\([(;:\"]\\|`(\\|#'(\\)"))
            (paragraph-separate
             (concat paragraph-separate "\\|\\s-*\".*[,\\.]$"))
-            (fill-column (if (integerp emacs-lisp-docstring-fill-column)
+            (fill-column (if (and (integerp emacs-lisp-docstring-fill-column)
+                                  (derived-mode-p 'emacs-lisp-mode))
                              emacs-lisp-docstring-fill-column
                            fill-column)))
        (fill-paragraph justify))